home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.004 / xemacs-1 / xemacs-19.13 / src / unexfx2800.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-03-01  |  1.1 KB  |  35 lines
  1. /* Unexec for the Alliant FX/2800.  */
  2.  
  3. This file is part of XEmacs.
  4.  
  5. XEmacs is free software; you can redistribute it and/or modify it
  6. under the terms of the GNU General Public License as published by the
  7. Free Software Foundation; either version 2, or (at your option) any
  8. later version.
  9.  
  10. XEmacs is distributed in the hope that it will be useful, but WITHOUT
  11. ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  12. FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  13. for more details.
  14.  
  15. You should have received a copy of the GNU General Public License
  16. along with XEmacs; see the file COPYING.  If not, write to the Free
  17. Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  18.  
  19. /* Synched up with: FSF 19.28. */
  20.  
  21. #include <stdio.h>
  22.  
  23. unexec (new_name, a_name, data_start, bss_start, entry_address)
  24.      char *new_name, *a_name;
  25.      unsigned data_start, bss_start, entry_address;
  26. {
  27.   int stat;
  28.     
  29.   stat = elf_write_modified_data (a_name, new_name);
  30.   if (stat < 0)
  31.     perror ("emacs: elf_write_modified_data");
  32.   else if (stat > 0)
  33.     fprintf (stderr, "Unspecified error from elf_write_modified_data.\n");
  34. }
  35.